home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 2 / Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso / Pearls / dev / GUI / Triton / Programmer / gcc / source / tr_easyrequest.c < prev    next >
C/C++ Source or Header  |  1994-07-14  |  1KB  |  32 lines
  1. /*
  2.  *  Triton - The object oriented GUI creation system for the Amiga
  3.  *  Written by Stefan Zeiger in 1993-1994
  4.  *
  5.  *  (c) 1993-1994 by Stefan Zeiger
  6.  *  You are hereby allowed to use this source or parts of it for
  7.  *  creating programs for AmigaOS which use the Triton GUI creation
  8.  *  system. All other rights reserved.
  9.  *
  10.  *  Triton linkable library code for GCC - (c) 1994 by Gunther Nikl
  11.  */
  12.  
  13. #include "triton.h"
  14.  
  15. extern struct Library *TritonBase;
  16.  
  17. ULONG TR_EasyRequest(struct TR_App *app, STRPTR bodyfmt, STRPTR gadfmt, struct TagItem *taglist)
  18. {
  19.   register ULONG _res __asm("d0");
  20.   register struct Library *a6 __asm("a6") = TritonBase;
  21.   register struct TagItem *a0 __asm("a0") = taglist;
  22.   register struct TR_App *a1 __asm("a1") = app;
  23.   register STRPTR a2 __asm("a2") = bodyfmt;
  24.   register STRPTR a3 __asm("a3") = gadfmt;
  25.   __asm __volatile ("jsr a6@(-0x5a)"
  26.   : "=r" (_res)
  27.   : "r" (a6), "r" (a0), "r" (a1), "r" (a2), "r" (a3)
  28.   : "a0","a1","a2","a3","d0","d1", "memory");
  29.   return _res;
  30. }
  31.  
  32.